CU Amiga Super CD-ROM 2/CU Amiga Magazine's Super CD-ROM 02 (1996)(EMAP Images)(GB)[!][issue 1996-04].iso/magazine/amiga_e/amigae.jan.archive/000059_crash!dtek.cha…ers.se!d2hacker_Tue, 25 Jan 94 01:05:54 PST.msg

Text File | 1994-02-17 | 5KB | 113 lines

Received: by bkhouse.cts.com (V1.17-beta/Amiga)
      id <[e-mail]>; Tue, 25 Jan 94 01:05:54 PST
Received: from hacke14.dtek.chalmers.se by crash.cts.com with smtp
    (Smail3.1.28.1 #18) id m0pOUOl-0000LtC; Mon, 24 Jan 94 08:44 PST
Received: from localhost (d2hacker@localhost) by hacke14.dtek.chalmers.se (8.6.4/8.6.4) id RAA09700 for [e-mail]; Mon, 24 Jan 1994 17:44:17 +0100
Message-Id: <[e-mail]>
Date: Mon, 24 Jan 1994 17:44:15 +0100 (MET)
In-Reply-To: <[e-mail]> from "Rob Nottage" at Jan 20, 94 08:27:15 pm
X-Mailer: ELM [version 2.4 PL22]
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Content-Length: 1826
From: Magnus Hacker <[e-mail]>
To: [e-mail]
Subject: Re: Some Questions

>     3) Could someone show me a simple example of how to get input from
>        a window once you open it. I know towrite to the screen you use
>        TextF() instead of WriteF(). I can use ReadStr() to get input
>        from, say, cli screens, but I can't find what to use from a
>        window that I have opened. I'm writng a little adventure game
>        and want to input commands from the window I open.
>

Try this:

DEF handle,oldstd

IF (handle:=Open('CON:0/0/640/200/My Adventure Game',NEWFILE))

  oldstd:=SetStdOut(handle)
  WriteF('Welcome to Zork XIV!\n')
  /*
   .
   . (The game code. Use the same functions as for cli windows, i.e ReadStr())
   .
  */

  Close(handle)
  SetStdOut(oldstd)
  WriteF('So long!\n')

ENDIF

First, you open a file. The file is actually a console window and it behaves
exactly like a cli window. The filename is 'CON:x/y/width/height/name'.
Of course you have to check that the window actually opened. That is the
reason for the IF statement.

Then you have to set the standard output handle to the handle of your newly
opened window. SetStdOut() does this for you, and it returns the old
standard output handle, in case you need it again.

Now you can use WriteF() and ReadStr() to your heart's content. Use Close()
to close the window, not CloseW(). Re-set the standard output if you wish
to make sure that output after the Close() call is sent to the cli window
that you ran the program from. (The 'So long' in the code above will appear
in your cli window)

Hope this helps,

+--------------------------------------------------+-------------------+
| Magnus Hacker, Chalmers Univ. of Technology      |     This space    |
| [e-mail]                        |      for rent     |
+--------------------------------------------------+-------------------+
From crash!kadewe.artcom.de!hans Tue, 25 Jan 94 01:06:03 PST
Received: by bkhouse.cts.com (V1.17-beta/Amiga)
      id <[e-mail]>; Tue, 25 Jan 94 01:06:03 PST
Received: from kadewe.artcom.de by crash.cts.com with smtp
    (Smail3.1.28.1 #18) id m0pOUVj-0000KMC; Mon, 24 Jan 94 08:51 PST
Received: by kadewe.artcom.de (/\==/\ Smail3.1.25.1 #25.3 MX/A)
      id <[e-mail]>; Mon, 24 Jan 94 17:51 MET
Message-Id: <[e-mail]>
Date: Mon, 24 Jan 1994 17:51:32 +0100
Reply-To: [e-mail]
X-Mailer: Mail User's Shell (7.2.5 10/14/92)
From: hans@kadewe (Hans H. Huebner)
To: [e-mail]
Subject: Please unsubscribe [e-mail] from the Amiga Mailing List

The subject says it all.  Please remove that user from the Mailing list.

Thanks - Hans ([e-mail])

--
Hans H. Huebner                    ART+COM e.V
Voice:    ([phone]            Hardenbergplatz 2
Fax  :  [phone]            10623 Berlin
From crash!freenet.carleton.ca!ao443 Tue, 25 Jan 94 01:06:15 PST
Received: by bkhouse.cts.com (V1.17-beta/Amiga)
      id <[e-mail]>; Tue, 25 Jan 94 01:06:15 PST
Received: from freenet-news.carleton.ca by crash.cts.com with smtp
    (Smail3.1.28.1 #18) id m0pOUZQ-00019nC; Mon, 24 Jan 94 08:55 PST
Received: from freenet.carleton.ca by freenet-news.carleton.ca (4.1/SMI-4.0)
    id AA20284; Mon, 24 Jan 94 11:55:05 EST
Received: from localhost (ao443@localhost) by freenet.carleton.ca (8.6.4/8.6.4) id LAA22844; Mon, 24 Jan 1994 11:55:15 -0500
Date: Mon, 24 Jan 1994 11:55:15 -0500
Message-Id: <[e-mail]>
Reply-To: [e-mail]
From: [e-mail] (Jason Maskell)
To: [e-mail]
Subject: Subscription problems..


   I seem to be getting two copies of every message on the list.. Do I
have two subscriptions or something?


--
-------------------------------------------------------------------------

Claimer: My employers agree wholeheartedly with my every utterance.